﻿Imports Models.Users

Namespace Security

    Public Class PermissionVO
        Inherits BaseVO

        Private _permissionId As Integer
        Private _code As String

        Sub New()
        End Sub

        Sub New(entity As Data.BaseModel.Permission)
            permissionId = entity.PermissionId
            code = entity.Code
        End Sub

        Public Property permissionId As Integer
            Get
                Return _permissionId
            End Get
            Set(ByVal value As Integer)
                _permissionId = value
            End Set
        End Property
        <StringLengthAtt(50, "code", 3)> _
        Public Property code As String
            Get
                Return _code
            End Get
            Set(value As String)
                _code = value
            End Set
        End Property

    End Class

End Namespace